Top 10k strings from MicroHobby Semanal - Issue 029-032 (1985)(Hobby Press)(es)(Side B).tzx
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
10 X(I),Y(I);" 6 a$="ld ("+ 6 X(F),Y(F);" 6 ;"PARE LA CINTA": 4 );ti;" ";"Jugad:";pa;" ";J$(2 3 Q(I)=Q(I-1 3 Q(I)=Q(F-1 3 ;" ": 3 (Q(I)=Q(I+1 3 (Q(I)=Q(F+1 2 goto imprime 2 goto imprime 2 b$=" " 2 Q(F)=Q(I): 2 L(TUR)=L(TUR)-1 2 L(TUR)=L(TUR)+1 2 ;"NAVES =";v;" PUNTOS =";pu;" RECORD =";r 2 ;"ES EL CAMPEON!!!" 2 ,n;" "; 2 )=" ROJAS ": 2 (NPROG/DOS) 2 "22",CERO;B$: 1 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzz 8888888888888888888888888888888888888888888888888888888888888888 1 x1,y1;" "; 1 x1,y1;" " 1 p1+p2+p3+p4<3 1 p1+p2+p3+p4+tr 1 micro 1 m$=j$+b$+b$+k$+b$+b$+b$+l$ 1 m$=" M-PISAR. " 1 l$=" P-DERECHA. " 1 k$=" USAR TECLAS O-IZQUIERDA. " 1 j$=" ALIADAS DE LAS HORMIGAS 1 j$=" CUATREROS DEL ESPACIO " 1 indix=indix-1 1 i$=" PERO CUIDADO CON LAS 1 h=(XN-X0)/(N-1 1 h$=" O QUEDARTE SIN FRUTA. " 1 goto imprime 1 goto error 1 goto Lectura 1 g$=" TU UNICA DEFENSA ES MATAR " 1 f$="QUIERES MAS ACCION (s/n) " 1 f$=" POR LAS HORMIGAS. " 1 e$=" CUANDO TU FRUTA ES ATACADA " 1 dirno 1 d$=" TERMINANDO TU MERIENDA... " 1 caso normal 1 cargador f 1 c$=" TE ENCUENTRAS EN EL CAMPO " 1 b$=" " 1 al,la;" ": 1 a$="out ("+ 1 a$="ld ("+i$+"+"+ 1 a$="ld "+a$+","+b$ 1 a$="add "+i$+","+i$: 1 a$=" . . " 1 YP=EV*(Y-YMIN)+24 1 YMIN=P(I,2 1 YMAX=P(I,2 1 XP=EH*(X-XMIN)+8 1 XMIN=P(I,1 1 XMAX=XMIN: 1 XMAX=P(I,1 1 X(Z),Y(Z);" 1 VALOR DE LAS CASILLAS 1 UNO;"PONGA EN MARCHA LA CINTA"; 1 Tron 1 TZX por Manuel Gomez Amate 1 TIRADA AZAR 1 T$=" " 1 Senet 1 SPACE-UNO,X1 1 SPACE-UNO,CERO: 1 SPACE,LINEA: 1 SPACE,CERO: 1 S$=" " 1 Rungekutta 1 Ransom 1 Q(I)=Q(I-2 1 Q(I)=Q(I+2 1 Q(I)=Q(F-2 1 Q(I)=Q(F+2 1 Q(F)=W(TUR) 1 Q(F)=Q(F-1 1 Q(F)=Q(F+1 1 Picnic p$ 1 O(TUR)=O(TUR)+1 1 N$=" 1 MJ=MJ+V(I) 1 MJ=MJ+FE*(5 1 MERIENDA..1985 1 MARCO ANTONIO ARROYO RAMIREZ 1 L$=" TECLAS-~P~-DERECHA ~O~-IZQUIERDA ~Q~-SUBIR ~A~-BAJAR " 1 K(XC+H2,YC+H2*K2) 1 K(XC+H2,YC+H2*K1) 1 K(XC+H,YC+H*K3) 1 K$=" ESTAS AL MANDO DE CINCO NAVES PREPARADAS PARA ROBAR CABALLOS DEL PLANETA ~ORION~ TEN CUIDADO CON LA BARRERA DE ~....~ QUE TE DESTRUIRAN. " 1 I,CERO;,,: 1 Hobby Press 1 FLAG=(C$="S" 1 Desensam 1 DOS=UNO+UNO 1 DESENSAMBLADOR DECIMAL 1 DEFENSA=DEFENSA+1 1 Cuatreros 1 Castellano 1 CUATREROS DEL ESPACIO..1985 1 COMPROBACION 1 CINTA 08 CARA B 1 CERO;" "; 1 CARAB " 1 CAMBIO DE TURNO 1 C$=" Por favor, elija un programa " 1 C$(TUR)=" NEGRAS ": 1 B$=" " 1 Azatoth 1 ="L")-(378 1 ;G$(TUR);" " 1 ;"[5] ACABAR " 1 ;"[4] JUEGO INTERRUMPIDO "; 1 ;"[3] JUEGO ENTRE HUMANOS "; 1 ;"[2] JUEGO SPECTRUM-HUMANO "; 1 ;"[1] REGLAS DEL JUEGO "; 1 ;"YMIN=";YMIN; 1 ;"YMAX=";YMAX: 1 ;"YA NO SALDRAS NUNCA."; 1 ;"XMIN=";XMIN; 1 ;"XMAX=";XMAX 1 ;"VIDAS:": 1 ;"VIDAS =";v;" PUNTOS =";pu;" RECOR =";r 1 ;"UN MOMENTO" 1 ;"TIRADA DE"; 1 ;"TIENES QUE RESCATAR A LA GENTE QUE CONSIGUE HUIR DE LA INVASIONDE LAS TROPAS RUSAS,Y LLEVARLAS AL BARCO.PERO TEN CUIDADO,HAN PUESTO UN TANQUE EN LA MURALLA PARA EVITAR EL RESCATE." 1 ;"Si son tres las fichas seguidas,no pueden ser atacadas ni sobre-pasadas por las fichas enemigas,pero si permiten el paso de lasde su color. " 1 ;"RECOMENDABLE ENTRE 5 Y 25" 1 ;"PUNTOS=";p;" MERIENDA=";j;" VIDAS=";v 1 ;"PUNTOS:";p; 1 ;"PULSE CUALQUIER TECLA." 1 ;"PULSA: (G)rabar(C)ontinuar(M)enu": 1 ;"PULSA UNA TECLA PARA CONTINUAR": 1 ;"PARE LA CINTA" 1 ;"PARA VOLVER A JUGAR PULSA (S)" 1 ;"OTRA PARTIDA?" 1 ;"NOMBRE JUGADORES MAXIMO 7 LETRAS" 1 ;"MAXIMO 10 CARACTERES" 1 ;"MAXIMA 1 - MINIMA 10" 1 ;"Las tiradas de dados que no pue-dan ser utilizadas para avanzarhacen retroceder la ficha,no pu-diendose hacer si la casilla es-ta ocupada, en ese caso se pasa." 1 ;"LO CONSEGUISTE, YA ERES AMO DEL "; 1 ;"GAME OVER": 1 ;"FUEL :1200": 1 ;"Ecuacion: dY/dX= ?" 1 ;"EL movimiento de fichas es segunla puntuacion obtenida de cuatrodados de dos caras,roja y negra." 1 ;"Desensamblado imposible en esta zona,revise la rutina e intro- duzca otra direccion": 1 ;"CASTILLO AZAZOTH.!!!!!": 1 ;"?0A0*2><4=I0A*?D;B4*.B?024.***" 1 ;"4 VELOCIDAD." 1 ;"3 CUANTAS PARTIDAS JUGAMOS."; 1 ;"2 NOMBRE JUGADOR DERECHO."; 1 ;"1 NOMBRE JUGADOR IZQUIERDO."; 1 ;"*4;*<>E8<84=C>*B4*A40;8I0*2>=***;0B*C42;0B/*********************0AA810,,,,,@,,,,,,,?************0109>,,,,,,0,,,,,,,;************8I@D84A30,,I,,,,,,,=************34A4270,,,,G,,,,,,,<" 1 ;"*4;*<>E8<84=C>*4B*0DC><0C82>,*=>3414B*<0=C4=4A*0?A4C030B*;0B*C4*2;0B-*?D4B*4;*>A34=03>A*=>*;44**<0B*@D4*D=0*0*;0*E4I," 1 ;"*3414B*0AA8=2>=0A*0*CD*2>=CA8=**20=C4*70284=3>;4*27>20A*2>=CA0**;0*?0A43*@D4*E08B*2A40=3>*4=*ED*4BCA>*<>E8<84=C>*>*2>=CA0*4;*1>A34*34*;0*?8BC0," 1 ;"(#)Casillas C5-C7-C8,refugios enlos que ninguna ficha puede seratacada. " 1 ;" [ JUGADOR 2 ] ";G$(2 1 ;" [ JUGADOR 1 ] ";G$(1 1 ;" T U R N O "; 1 ;" STAR TAPE Y ENTER ": 1 ;" PUNTOS: "; 1 ;" PULSA UNA TECLA PARA EMPEZAR. ": 1 ;" PULSA UNA TECLA PARA CONTINUAR ": 1 ;" NOMBRE (max. 7) ? ";G$(1 1 ;" La ficha elegida es la corres- pondiente a: FILA.....( A-B-C ) COLUMNA..( 0 a 9 )" 1 ;" GANADOR "; 1 ;" FRUTA PERDIDA ": 1 ;" FICHA A RETROCEDER ? ";R$ 1 ;" FICHA A MOVER ? o [R-P-I] "; 1 ;" Es un juego de carreras ,en el que gana el jugador que logra sacar primero todas las fichas del tablero. " 1 ;" El SENET es un juego de tablero para dos personas que se jugaba en el antiguo Egipto. Juego de inteligencia, mas que de azar, y de larga duracion se le consideraba con sentido reli gioso,ya que los movimientos de las piezas en el tablero repre- sentarian las vicisitudes del alma humana en su viaje al mas alla. " 1 ;" EMPIEZA:[1]";G$(1 1 ;" Dos fichas de un mismo color nopueden estar en la misma casillapero si estan en casillas conse-cutivas estan protegidas contraun cambio de las enemigas. " 1 ;" DIGITAR OPCION " 1 ;" Cuando un jugador ha colocado todas sus fichas en la ultima fila, puede ir sacandolas cu- ando llegen a la casilla C9(^)." 1 ;" Cada uno tiene 5 fichas, rojas o negras y se mueven en forma de S invertida. Es decir: A0 a A9 - B9 a B0 - C0 a C9 " 1 ;" CONTINUAS JUGANDO (S/N) ? ";R$ 1 ;" CARGA JUEGO OPCION (2 o 3) ? ": 1 ;" <ESPERAR UN MOMENTO> " 1 ;" <ENTER> despues de cada opcion." 1 ;" <A-B-C>--: Coordenadas ficha a <0 a 9> mover. <R>----: Retroceso de ficha. <P>----: Paso de la jugada. " 1 ;" 1-4-6 puntos: se mueve ficha y se tira de nuevo. 2 - 3 puntos: se mueve ficha y se pasa el turno." 1 ;" # LAS ENTRADAS EN MAYUSCULAS # " 1 ;" ";G$(TUR) 1 ;" PULSA "; 1 ;" PARAR LA CINTA ": 1 ;" NO PUEDO MOVER ": 1 ;" M E N U "; 1 ;" HAS PERDIDO UNA VIDA. SIGUE!. ": 1 ;" FUERA " 1 ;" FICHA "; 1 ;" DADOS ": 1 ;" 1 cara blanca - 1 punto 2 caras blancas - 2 puntos 3 caras blancas - 3 puntos 4 caras blancas - 4 puntos 4 caras negras - 6 puntos " 1 ;" ## PULSA <ENTER> 7 VECES ## ": 1 ;" PULSA UNA TECLA PARA MENU ": 1 ;" PULSA UNA TECLA PARA MENU " 1 ;" Otra Direccion (S/N)?": 1 ;" NO INTENTES HACER TRAMPAS NO PODRAS HACERLO " 1 ;" GANADOR :: "; 1 ;" Cuando una ficha va a parar a una casilla ocupada por otra e- nemiga, esta tiene que retroce- der a la casilla que la primera acaba de abandonar. " 1 ;" <I>----: Interrumpir partida. (G)rabar partida para continuarla en otro momento mediante la opcion (4) del menu. (C)ontinuar la partida (M)enu. " 1 ;" ...estoy pensando. " 1 ;" ***TECLAS A UTILIZAR*** " 1 ;" DERECHA..........P IZQUIERDA........I PARADO...........O ABAJO............A ARRIBA...........Q" 1 ;" PULSE UNA TECLA " 1 ;" COPY (S/N)": 1 ;" " 1 : 1 780 1 3 FICHAS SEGUIDAS 1 2 FICHAS SEGUIDAS 1 1985 J-M P P" 1 /(YMAX-YMIN) 1 /(XMAX-XMIN): 1 ,n;f$(n);: 1 ,n;" "; 1 ,n;" ": 1 ,D.L.: M-36598-84 1 **datas normales** 1 **datas iterativas** 1 **datas de ED<124** 1 *********************** ** S E N E T ** ** ** ** 1 *********************** 1 *********************** 1 *** CINTA-MICROHOBBY *** 1 ** es IX-d ? ** 1 ** es IX-CB ? ** 1 ** es IX o IY? ** 1 ** a>63 y a<192 ** 1 ** a>63 y a<128 ** 1 ** a>127 ** 1 ** SUB. ANADE 2 NOS. ** 1 ** SUB. ANADE 1 NO. ** 1 ** LLEVA NUMERO? ** 1 ** LECTURA ** 1 ** IX-caso normal ** 1 ** IMPRESION ** 1 ** Es ED? ** 1 ** Es CB? ** 1 ** ES ITERATIVA? ** 1 ** ENTRADA DE DATOS ** 1 ** ED>160 ** 1 ** CB>64 ** 1 ** CB<64 ** 1 ** CASO NORMAL ** 1 ** CAMBIA HL-(IX+D) ** 1 ** CALCULOS ITERATIVOS** 1 ** RUTINA (S/N) ** 1 ** PRESENTACION ** 1 ** FIN ** 1 ** ERROR ** 1 ** IX o IY ** 1 ** CB ** 1 * es IX-caso especial?* 1 )="SPECTRUM" 1 )=" TRAMPOSO !!! PUEDES RETROCEDER" 1 )=" FALTAN FICHAS PARA PODER SALIR" 1 )=" VAS A CAMBIAR UNA FICHA TUYA" 1 )=" MIRA MEJOR - PUEDES AVANZAR" 1 )=" TE SALES DEL TABLERO" 1 )=" NO HAY FICHA" 1 )=" ESA NO ES TU FICHA " 1 )=" JUGADA ILEGAL" 1 )=" ENTRADA ERRONEA" 1 );"[2]";G$(2 1 );" ";G$(2 1 )+i$+n$+a$(c+2 1 (x)+","+b$ 1 (num)+"),sp": 1 (num)+"),hl": 1 (num)+"),hl" 1 (num)+"),de": 1 (num)+"),bc": 1 (num)+"),a": 1 (num)+"),a" 1 (f$(n))-50 1 (VALOR)<"A" 1 (Q(I)=Q(I-1 1 (Q(I)=Q(F-1 1 ((Q(I)=Q(I+1 1 ((Q(I)=Q(F+1 1 '''"PULSA ENTER": 1 ''"Q-ARRIBA","A-ABAJO","O-DERECHA","I-IZQUIERDA": 1 '"CUIDADO CON QUEDARTE ENCERRADO. ": 1 "rlc ","rrc ","rl ","rr ","sla ","sra "," ","srl " 1 "ret z","ret","2jp z,"," ","2call z,","2call ","1adc a,","rst 8","ret nc","pop de" 1 "ret p","pop af","2jp p,","di","2call p,","push af","1or ","rst '48'","ret m","ld sp,hl" 1 "nop","2ld bc,","ld (bc),a","inc bc","inc b","dec b","1ld b,","rlca","ex af,af'","add hl,bc" 1 "ldi","cpi","ini","outi"," "," "," "," ","ldd","cpd" 1 "ld a,(bc)","dec bc","inc c","dec c","1ld c,","rrca","1djnz DIS-","2ld de,","ld (de),a","inc de" 1 "ind","outd"," "," "," "," ","ldir","cpir","inir","otir" 1 "inc d","dec d","1ld d,","rla","1jr DIS-","add hl,de","ld a,(de)","dec de","inc e","dec e" 1 "inc a","dec a","1ld a,","ccf" 1 "in d,(c)","out (c),d","sbc hl,de","2"," "," ","im 1","ld a,i","in e,(c)","out (c),e" 1 "in a,(c)","out (c),a","adc hl,sp","2*ld sp,(" 1 "im 0","ld i,a","in c,(c)","out (c),c","adc hl,bc","2ld bc,("," ","reti"," ","ld r,a" 1 "bit ","res ","set " 1 "b","c","d","e","h","l","(hl)","a" 1 "add a,","adc a,","sub ","sbc a,","and ","xor ","or ","cp " 1 "adc hl,de","2ld de,("," "," ","im 2","ld a,r","in h,(c)","out (c),h","sbc hl,hl","2" 1 "Valor inicial y final de X? ";X0,XN 1 "Valor inicial de Y? ";Y0 1 "Todos los numeros representados son decimales,lo que facilita lalocalizacion de rutinas,asi comola identificacion de valores." 1 "Si se detiene el listado con un error es debido a que se intenta desensamblar una seccion de la memoria que no contiene un pro- grama en codigo de maquina,como por ejemplo,tablas de datos,zonade programas BASIC,etc." 1 "RESOLUCION DE ECUACIONES DIFE- RENCIALES ORDINARIAS DE PRIMER ORDEN POR EL METODO DE RUNGE - KUTTA" 1 "Quiere una escala igual para am-bos ejes? ";c$ 1 "Quiere imprimir los puntos por pantalla? ";C$: 1 "QUIERES MAS FRUTA?(s/n)";j$ 1 "QUE ESTA PERDIDA . 1 "Numero de Bytes..";f: 1 "No. de puntos? ";N 1 "NIVEL DE DIFICULTAD (1-10)? ";di: 1 "MicroHobby Semanal numeros 29 a 32 1 "Los jugadores tiran alternativa-mente los dados hasta que uno deellos saca 1 punto. Se adjudicalas negras y mueve obligatoria-mente de la casilla A9 a B9. " 1 "Entre la funcion derivada. Utilizar X e Y como argumentos ";A$ 1 "E-Desensam","F-Tron","G-Cuatreros","H-Picnic" 1 "Direccion de comienzo..";d: 1 "DIRECCION INSTRUCCION ________________________________" 1 "DEBES ENCONTRAR ESTA COPA 1 "A0","A1","A2","A3","A4","A5","A6","A7","A8","A9","B9","B8","B7","B6","B5","B4","B3","B2","B1","B0","C0","C1","C2","C3","C4","C5","C6","C7","C8" 1 "A-Azatoth","B-Senet","C-Rungekutta","D-Ransom" 1 "64"+NPROG) 1 "5";"cara: "; 1 "5";"Programa: "; 1 "5";"Programa inexistente": 1 "5";"'R' Vuelve al menu" 1 "5";"'L' Carga el programa"; 1 "32"-I;C$( 1 "2jp nc,","1","2call nc,","push de","1sub ","rst '16'","ret c","exx","2jp c,","1*in a,(" 1 "2jp m,","ei","2call m,"," ","1cp ","rst '56'" 1 "2call c,"," ","1sbc a,","rst '24'","ret po","pop hl","2jp po,","ex (sp),hl","2call po,","push hl" 1 "22",CERO;C$(I 1 "22",CERO;B$ 1 "22",CERO; 1 "2","inc sp","inc (hl)","dec (hl)","1ld (hl),","scf","1jr c,DIS-","add hl,sp","2*ld a,(","dec sp" 1 "1ld e,","rra","1jr nz,DIS-","2ld hl,","2","inc hl","inc h","dec h","1ld h,","daa" 1 "1jr z,DIS-","add hl,hl","2*ld hl,(","dec hl","inc l","dec l","1ld l,","cp l","1jr nc,DIS-","2ld sp," 1 "1and ","rst '32'","ret pe","jp (hl)","2jp pe,","ex de,hl","2call pe,"," ","1xor ","rst '40'" 1 "(@)-Casilla C6, el cepo, las fi-chas que caigan en el deben vol-ver a empezar desde la primeracasilla libre. " 1 " Se colocan en las casillas del A0 al A9, las ROJAS en los pa- res, las NEGRAS en los impares." 1 " No existen documentos egipcios que expliquen exactamente como se jugaba, pero el arqueologo suizo Gustave Jequier ha elabo- rado unas reglas, corroboradas por el egiptolista Edgar Pusch." 1 " ","rld","in f,(c)"," ","sbc hl,sp","2"," "," "," "," " 1 " "," ","ret nz","pop bc","2jp nz,","2jp ","2call nz,","push bc","1add a,","rst 0" 1 " "," "," ","rrd","in l,(c)","out (c),l","adc hl,hl","2*ld hl,("," "," " 1 " "," "," "," ","lddr","cpdr","indr","otdr"," "," " 1 " "," "," "," ","in b,(c)","out (c),b","sbc hl,bc","2","neg","retn" 1 " Teclee RUN para continuar": 1 " INTRODUCCION DE DATOS": 1 VARIABLES INICIALES 1 VARIABLES 1 RETROCESOS ILEGALES 1 RETROCESO FICHA 1 RETROCESO 1 RETORCESO LEGAL 1 JUGADA ILEGAL 1 JUEGO MAQUINA-HUMANO 1 JUEGO HUMANOS 1 J.A. ELOSU 1985 ** *********************** 1 INTERCAMBIO FICHAS 1 INSTRUCCIONES 1 GRABACION JUEGO 1 FICHAS INICIALES 1 FICHAS FUERA 1 CONVERSION CASILLA 1 COMPROBACION PASO 1 CASILLA 30 1 CASILLA 27 1 CARGA DE JUEGO 1 CAMBIO JUGADOR 1 Antonio Ocon - 1985 Este programa ofrece el listado de los mnemonicos correspondien-tes al codigo de maquina junto con la direccion de la instruc- cion principal." 1 AZAR FICHAS 1 AVANCES ILEGALES 1 AVANCE FICHA 1 ANTONIO OCON-1985 1 **datas de ED>124** 1 ** GRAFICA ** 1 ** ED ** 1 DIA DE CAMPO 1 DESENSAMBLADOR Z-80 1 ******* *JUEGO* ******* 1 goto error 1 goto caso normal 1 *********** *VARIABLES* *********** 1 ********** *PANTALLA* ********** 1 ******* *FINAL* ******* 1 ******* *FALLO* ******* 1 1